More quietly report request timeouts as events

* eglot.el (eglot--sync-request): Use eglot--log-event

diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index f87b4eaf124b710d84a1aa127c39e0ee362abaed..83f4efd1437b2be0a8c28d416a91459c10334d7b 100644 (file)
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -612,9 +612,9 @@ timeout keeps counting."
                    (remhash id (eglot--pending-continuations proc))
                    (funcall (or timeout-fn
                                 (lambda ()
-                                  (eglot--error
-                                   "Tired of waiting for reply to %s, id=%s"
-                                   method id))))))))))
+                                  (eglot--log-event
+                                   proc `(:timed-out ,method :id id
+                                                     :params ,params)))))))))))
     (when deferred
       (let* ((buf (current-buffer))
              (existing (gethash (list deferred buf) (eglot--deferred-actions proc))))